object CacheData: TCacheData
  OldCreateOrder = True
  Left = 285
  Top = 161
  Height = 479
  Width = 741
  object DataSource: TDataSource
    DataSet = IfxQuery
    Left = 43
    Top = 70
  end
  object IfxConnection: TIfxConnection
    Monitor = IfxCompositMonitor
    Left = 40
    Top = 16
  end
  object IfxQuery: TIfxQuery
    Connection = IfxConnection
    OnCalcFields = IfxQueryCalcFields
    OnUpdateError = UpdateErrorHandler
    SQL.Strings = (
      'SELECT'
      '  customer_num,'
      '  fname,'
      '  lname'
      'FROM'
      '  customer')
    UpdateObject = IfxUpdateSQL
    Left = 112
    Top = 16
    object IfxQuerycustomer_num: TAutoIncField
      AutoGenerateValue = arAutoInc
      FieldName = 'customer_num'
    end
    object IfxQueryfname: TStringField
      FieldName = 'fname'
      Size = 15
    end
    object IfxQuerylname: TStringField
      FieldName = 'lname'
      Size = 15
    end
    object IfxQueryUpdateStatus: TStringField
      FieldKind = fkCalculated
      FieldName = 'UpdateStatus'
      Size = 50
      Calculated = True
    end
  end
  object IfxUpdateSQL: TIfxUpdateSQL
    ModifySQL.Strings = (
      'UPDATE customer'
      'SET'
      '  fname = :fname,'
      '  lname = :lname'
      'WHERE'
      '  customer_num = :OLD_customer_num')
    InsertSQL.Strings = (
      'INSERT INTO customer'
      '  (fname, lname)'
      'VALUES'
      '  (:fname, :lname)')
    DeleteSQL.Strings = (
      'DELETE FROM'
      '  customer'
      'WHERE'
      '  customer_num = :OLD_customer_num')
    RefreshSQL.Strings = (
      'SELECT'
      '  fname, lname'
      'FROM'
      '  customer'
      'WHERE'
      '  customer_num = :OLD_customer_num')
    Left = 184
    Top = 16
  end
  object IfxCompositMonitor: TIfxCompositMonitor
    Items = <
      item
        Monitor = IfxFileMonitor
      end
      item
        Monitor = IfxVisualMonitor
      end>
    Left = 162
    Top = 138
  end
  object IfxFileMonitor: TIfxFileMonitor
    FileName = 'cache.log'
    Left = 114
    Top = 216
  end
  object IfxVisualMonitor: TIfxVisualMonitor
    Position = mpTopRight
    HelpFile = 'en_us\04e4\errmess.hlp'
    Left = 204
    Top = 216
  end
end
